home *** CD-ROM | disk | FTP | other *** search
- object FormBwMCSettings: TFormBwMCSettings
- Left = 0
- Top = 0
- BorderStyle = bsDialog
- Caption = 'Settings'
- ClientHeight = 265
- ClientWidth = 545
- Color = clBtnFace
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Shell Dlg 2'
- Font.Style = []
- OldCreateOrder = False
- Position = poMainFormCenter
- DesignSize = (
- 545
- 265)
- PixelsPerInch = 96
- TextHeight = 13
- object GbIdenitites: TGroupBox
- Left = 8
- Top = 209
- Width = 49
- Height = 31
- Caption = 'Other mail accounts to fetch messages from'
- Enabled = False
- TabOrder = 3
- Visible = False
- object ImgIdentities: TImage
- Left = 16
- Top = 29
- Width = 24
- Height = 24
- Picture.Data = {<image000.bmp>}
- Transparent = True
- end
- object LblMailDecription: TLabel
- Left = 47
- Top = 25
- Width = 388
- Height = 42
- AutoSize = False
- Caption =
- 'Diino can automatically download messages from other e-mail acco' +
- 'unts you may have. Add your accounts here. Only checked accounts' +
- ' will be processed.'
- WordWrap = True
- end
- object BtnRemove: TButton
- Left = 445
- Top = 124
- Width = 75
- Height = 25
- Action = AcRemove
- TabOrder = 1
- end
- object BtnEdit: TButton
- Left = 445
- Top = 170
- Width = 75
- Height = 25
- Action = AcEdit
- TabOrder = 2
- end
- object BtnAdd: TButton
- Left = 445
- Top = 78
- Width = 75
- Height = 25
- Action = AcAdd
- TabOrder = 0
- end
- object Lv: TListView
- Left = 16
- Top = 70
- Width = 420
- Height = 125
- Checkboxes = True
- Columns = <
- item
- Caption = 'E-Mail Address'
- Width = 210
- end
- item
- Caption = 'Store In'
- Width = 130
- end
- item
- Caption = 'Type'
- Width = 70
- end>
- GridLines = True
- ReadOnly = True
- RowSelect = True
- PopupMenu = Pm
- TabOrder = 3
- ViewStyle = vsReport
- OnChange = LvChange
- OnDblClick = LvDblClick
- OnKeyDown = LvKeyDown
- end
- end
- object BtnOK: TButton
- Left = 377
- Top = 235
- Width = 75
- Height = 25
- Anchors = [akRight, akBottom]
- Caption = '&OK'
- ModalResult = 1
- TabOrder = 0
- ExplicitTop = 238
- end
- object BtnCancel: TButton
- Left = 461
- Top = 235
- Width = 75
- Height = 25
- Anchors = [akRight, akBottom]
- Cancel = True
- Caption = '&Cancel'
- ModalResult = 2
- TabOrder = 1
- ExplicitTop = 238
- end
- object GbSMTP: TGroupBox
- Left = 7
- Top = 119
- Width = 530
- Height = 110
- Caption = 'Server to use when sending E-mail messages'
- TabOrder = 4
- object LblSMTP: TLabel
- Left = 165
- Top = 22
- Width = 65
- Height = 13
- Caption = 'SMTP Server:'
- end
- object LblUserName: TLabel
- Left = 165
- Top = 50
- Width = 52
- Height = 13
- Caption = 'Username:'
- end
- object LblPassword: TLabel
- Left = 165
- Top = 79
- Width = 50
- Height = 13
- Caption = 'Password:'
- end
- object Bevel: TBevel
- Left = 150
- Top = 19
- Width = 20
- Height = 84
- Shape = bsLeftLine
- end
- object RbDiino: TRadioButton
- Left = 9
- Top = 23
- Width = 130
- Height = 17
- Caption = 'Diino (Secure)'
- TabOrder = 0
- OnClick = SMTPChange
- end
- object RbCustom: TRadioButton
- Left = 9
- Top = 51
- Width = 130
- Height = 17
- Caption = 'Custom (Insecure)'
- TabOrder = 1
- OnClick = SMTPChange
- end
- object EdSMTP: TEdit
- Left = 275
- Top = 19
- Width = 160
- Height = 21
- TabOrder = 3
- OnChange = SMTPChange
- end
- object EdUserName: TEdit
- Left = 275
- Top = 47
- Width = 160
- Height = 21
- TabOrder = 4
- OnChange = SMTPChange
- end
- object EdPassword: TEdit
- Left = 275
- Top = 78
- Width = 160
- Height = 21
- PasswordChar = '*'
- TabOrder = 5
- OnChange = SMTPChange
- end
- object CbLogin: TCheckBox
- Left = 27
- Top = 77
- Width = 97
- Height = 17
- Caption = 'Login required'
- TabOrder = 2
- OnClick = SMTPChange
- end
- object BtnTest: TButton
- Left = 445
- Top = 47
- Width = 75
- Height = 25
- Action = AcTestSMTP
- TabOrder = 6
- end
- end
- object GbDiinoName: TGroupBox
- Left = 8
- Top = 4
- Width = 528
- Height = 113
- Caption = 'Diino Mail Account'
- TabOrder = 2
- object LblDiinoName: TLabel
- Left = 9
- Top = 18
- Width = 50
- Height = 13
- Caption = 'Full Name:'
- end
- object EdDiinoFullName: TEdit
- Left = 9
- Top = 34
- Width = 510
- Height = 21
- TabOrder = 0
- end
- object CbForward: TTntCheckBox
- Left = 9
- Top = 61
- Width = 460
- Height = 17
- Caption = 'Forward your Diino Mail to:'
- TabOrder = 1
- OnClick = ForwardChange
- end
- object EdForward: TEdit
- Left = 26
- Top = 81
- Width = 247
- Height = 21
- TabOrder = 2
- OnChange = ForwardChange
- end
- object CbForwardKeep: TTntCheckBox
- Left = 290
- Top = 83
- Width = 235
- Height = 17
- Caption = 'Keep a copy on Diino'
- TabOrder = 3
- OnClick = ForwardChange
- end
- end
- object AL: TActionList
- Left = 96
- Top = 206
- object AcAdd: TAction
- Caption = 'Add...'
- OnExecute = AcAddExecute
- OnUpdate = EventHandler
- end
- object AcRemove: TAction
- Caption = 'Remove'
- OnExecute = AcRemoveExecute
- OnUpdate = EventHandler
- end
- object AcEdit: TAction
- Caption = 'Edit'
- OnExecute = AcEditExecute
- OnUpdate = EventHandler
- end
- object AcPopulate: TAction
- OnExecute = AcPopulateExecute
- OnUpdate = EventHandler
- end
- object AcTestSMTP: TAction
- Caption = 'Test SMTP'
- OnExecute = AcTestSMTPExecute
- OnUpdate = EventHandler
- end
- end
- object Pm: TPopupMenu
- Left = 128
- Top = 206
- object MiAdd: TMenuItem
- Action = AcAdd
- end
- object MiEdit: TMenuItem
- Action = AcEdit
- end
- object N1: TMenuItem
- Caption = '-'
- end
- object MiRemove: TMenuItem
- Action = AcRemove
- end
- end
- end
-